Automatically enlisting a SharePoint site

A SharePoint site can be automatically enlisted based on VBScript events. An example of implementing this method is a GCF share named ContractorPortal that replicates with a SharePoint site at http://gcf-sp:45953/sites/ContractorPortal/ that has subsites for each contractor. When a project copy of a document is made in the vault, it should automatically enlist the document to the ContractorPortal share for replication to the contractor's subsite into a document library named Shared Documents.

The solution could be implemented using the two GCF script functions: EnlistTheSite and WebPortalLocation. EnlistTheSite is a standard GCF function. WebPortalLocation is called when a site is enlisted in PowerUser and when a site is enlisted by EnlistThisSite. WebPortalLocation accepts one parameter, the share name of the enlisted site.

Following is an example of the implementation.

1. After a project copy of a document is made (for example, in the DocCopyMoveEvent_AfterCopy event), call the EnlistTheSite function:
   

Call EnlistTheSite("ContractorPortal",True,True)

2. Define the WebPortalLocation function:

Function WebPortalLocation(ShareName)
  Dim rv(1)
  If Instr(1,ShareName,"Portal") > 0 Then
    rv(0) = "http://gcf-sp:45953/sites/ContractorPortal/" & _
    Document.Contract_ContractorName
    rv(1) = "Shared Documents"
  End If
  WebPortalLocation = rv
End Function

In this example, the value of the Document.Contract_ContractorName property is the contractor’s name.

Note    This method allows users to skip the Select Location dialog in PowerUser.